home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 13 / 013.d81 / ram start (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1985-01-01  |  1.3 KB  |  41 lines
  1. 5 q$=chr$(34)
  2. 10 rem   ram disk starter
  3. 20 rem
  4. 30 rem     ram disk is written by
  5. 40 rem       jeff johnson
  6. 50 rem
  7. 60 rem     the wedge which allows
  8. 70 rem       the usage of the '&'
  9. 80 rem       sign instead of sys51200
  10. 90 rem       was programmed by
  11. 100 rem      alan gardner
  12. 110 rem
  13. 120 rem
  14. 130 ifx=0thenx=1:load"ram wedge.o",8,1
  15. 140 ifx=1thenx=2:load"ram disk",8,1
  16. 150 sys828
  17. 160 poke53281,0:print"[147]ram disk is now active."
  18. 165 print"     [210][193][205][160][196][201][211][203] uses these commands:"
  19. 170 print"&"q$"s:filename"q$" - save a file to ram."
  20. 172 print"&"q$"l:filename"q$" - load a file from ram."
  21. 174 print"&"q$"k:filename"q$" - kill a file in ram."
  22. 175 print"&"q$"a:filename"q$" - save a file to disk."
  23. 176 print"&"q$"a"q$"          - save all files."
  24. 177 print"&"q$"k"q$"          - kill all files."
  25. 178 print"&"q$"$"q$"          - view directory."
  26. 180 print:print"[215]ould you like a printed list of the"
  27. 182 print"commands?":poke198,0:wait198,1:geta$
  28. 184 ifa$<>"y"then200
  29. 185 print"[207][203]..[208]ut your printer on-line and press"
  30. 186 print"a key.":poke198,0:wait198,1:open4,4,7:cmd4
  31. 187 print"     [210][193][205][160][196][201][211][203] uses these commands:":print:print
  32. 188 print"&"q$"s:filename"q$" - save a file to ram."
  33. 189 print"&"q$"l:filename"q$" - load a file from ram."
  34. 190 print"&"q$"k:filename"q$" - kill a file in ram."
  35. 192 print"&"q$"a:filename"q$" - save a file to disk."
  36. 194 print"&"q$"a"q$"          - save all files to disk."
  37. 196 print"&"q$"k"q$"          - kill all files in ram."
  38. 198 print"&"q$"$"q$"          - view directory."
  39. 199 print#4:close4
  40. 200 end
  41.